sub main()	dim x as integer	dim y as integer	x = 7
	msgbox("X=" & x & ", testing: (x >= 6) && (x <= 12)")	if (x >= 6) && (x <= 12) then		msgbox("In range one")	end if
	msgbox("X=" & x & ", testing: (x >= 0) && (x <= 5)")	if (x >= 0) && (x <= 5) then		msgbox("In range two")	end if	beepend sub